function xml2ps(xml, ps)

system(['/home/wcaarls/src/sc/arch2dot/arch2dot ' xml ' ' ps ...
	'.dot']);
system(['neato -Tps ' ps '.dot > ' ps]);
delete([ps '.dot']);
